Visual Basic program "VB Draw Sagittarius"

VB Draw Sagittarius - Sagitarrius A* Project support

Reflection

Introduction and Purpose

The purpose of the program "VB Draw Sagittarius" is to make 3 Drawings which are relevant for the "Sagitarius A* Project" which involves the simulation of 10 mini BH's around the black hole in the centre of the Sagittarius A* Constellation.

Test 1 involves the conversion of the initial parameters of a 2D Database in a 3D database and to show the results in a Display.
To read more about the 2D Database select this link: Sagitarrius.xls program
Test 2 shows an implementation of 3 support subroutines.
Test 3 shows a simulation of a Universe in 3D

To read more about the Sagittarius A* project select: Sagittarius program

Program Description

The program consists of 2 Forms: Control, Display

The Control Form is used to select a Test. There are 3 tests or cases. Each results in a drawing. Certain drawings require additional parameters.
The Display Form shows the drawing of each Test.

Control Form - Operation

Display 1

The control form is used to select and perform a simulation.

First select a particular Test. There are 3 Tests:
- Test 1 is a 3D Display of between 1 and 10 mini BH's
- Test 2 is a 3D Display of an ellipse, using different values of the parameters: omega, inclination and w.
- Test 3 is a 3D Display of the universe filled with BH's
Next Select a Sub Test.
- Test 1 has no subtests
- Test 2 has two subtests
  - Subtest 1 omega = 45 w = 30 omega1 = 0
  - Subtest 2 omega = 60 w = 65 omega1 = -100
- Test 3 has two subtests.
  - Subtest 1 shows a continuous simulation
  - Subtest 2 shows a dashed line simulation
Next Select Start
Next the simulation will show the Displays 2, 3 and 4 as explained below.

Display Form - Test1 - Operation

Display 2

Display 3

Display 2 shows an image of star #1. This is S1.
The path of S1 also shows three color points: A black point, a red point and a green dot.
The black point shows the position in 2020, the red point in 2010 and green dot in 2000.
when Display 2 is Selected, Display 2 shows an image of star #10. This is S62, A very interesting star. The revolution time is almost 10 years, and the speed is very high.
Because the the revolution time of S62 is 9.9 years the three color are the same position. The scale of S62 is 4 times S1

Display 3 shows an image of 10 stars revolving around the Black Hole in Sagittarius A*
When the display is selected the same 10 stars are shown. The scale is times 2.

It is important that Display 3 is not based on a simulation which involves interactions between all the 10 stars. Input of the program is the output of a file generated by the program Sagittarius.xls. See Sagitarrius.xls.program

Display Form - Test2 - Operation

Display 4

The purpose of the Display 4 is to test three subroutines: CALC, BackWards and Rotate.

The purpose of Subroutine CALC is to calculate the three parameters X,Y,Z based on the 4 parameters : Omega, w, inclination and r. Those 4 parameters represent a point on the Ellipse.
The purpose of Subroutine Backwards is to do the opposite of Subroutine CALC. That means to calculate based on the 5 parameters X, Y, Z, (r) and Omega the two parameters w and inclination.
The purpose of Subroutine Rotate is to perform an extra rotation in the X,Y plane. This is the same as the angle Omega does and shown as Omega1. See Display 1

This difference becomes Visible when Display 4 is Selected.

When Display 4 is not Selected Omega1 is equal to 0 Degrees.
When Display 4 is Selected Omega1 is equal to -100 Degrees.
This reflects Figure 1.412.1 (Angular orbital elements) of the book "Explanatory Supplement to the Astronomical Almanac" 1992

Display Form - Test 3 - Operation

The parameter v train defines the speed (max # of counts) of the train.
The general equation used is # of counts = v * 500.
Valid values v train are: 1,2,3 and 4. The coresponding counts are 500, 1000, 1500 and 2000
When v = 0 the # of counts is 2000. In that case there is no train.
When v = 0.002 the initial initial state of the train is shown.

For all the results of Test 3 which involves a simmulation of a Universe in 3D see: VB Universe 3D simulation

Additional Links

mass Sagittarius A* = 4.154 10^6 m0
https://arxiv.org/pdf/1708.06353.pdf
https://www.sciencealert.com/a-star-dancing-around-a-supermassive-black-hole-is-another-win-for-relativity
Astronomy and Astrophysics https://www.aanda.org/articles/aa/abs/2020/04/aa37813-20/aa37813-20.html

id1 	a 	e 	i (°) 	omega  	w (°) 	Tp (yr) 	P (yr) 	Kmag 	q (AU) 	v (%c) 	dv      m0
S1 	0.5950 	0.5560 	119.14 	342.04 	122.30 	2001,800 	166.0 	14.70 	2160.7 	0.55 	0.03    12.40
S2 	0.1251 	0.8843 	133.91 	228.07 	66.25 	2018,379 	16.1 	13.95 	118.4 	2.56 	0.00	13.6
S4 	0.3570 	0.3905 	80.33 	258.84 	290.80 	1957,400 	77.0 	14.40 	1779.7 	0.57 	0.01    12.2
S6 	0.6574 	0.8400 	87.24 	85.07 	116.23 	2108,610 	192.0 	15.40 	860.3 	0.94 	0.00     9.2
S8 	0.4047 	0.8031 	74.37 	315.43 	346.70 	1983,640 	92.9 	14.50 	651.7 	1.07 	0.0     13.2
S9 	0.2724 	0.6440 	82.41 	156.60 	150.60 	1976,710 	51.3 	15.10 	793.2 	0.93 	0.02     8.2
S12 	0.2987 	0.8883 	33.56 	230.10 	317.90 	1995,590 	58.9 	15.50 	272.9 	1.69 	0.01     7.6
S13 	0.2641 	0.4250 	24.70 	74.50 	245.20 	2004,860 	49.0 	15.80 	1242.0 	0.69 	0.01    10.
S14 	0.2863 	0.9761 	100.59 	226.38 	334.59 	2000,120 	55.3 	15.70 	56.0 	3.83 	0.06    10.
S62     0.0905 	0.9760 	 72.76 	122.61 	 42.62 	2003,330 	 9.9 	16.10 	16.4 	7.03 	0.04    10.
S66 	1.5020 	0.1280  128.50 	 92.30 	134.00  1771,000       664.0 	14.80 	10712.4 0.21 	0.02    10.

Introduction and Purpose

The central program used to perform test 1 is the program Main

test 2 is perform in the subroutine Case2
test 3 is perform in the subroutine Case3

Program Main
Program Main executes is Mini BH in the form of a Loop.

Feedback
None

Created: 13 August 2020

Back to my home page: Contents of This Document